home *** CD-ROM | disk | FTP | other *** search
/ PD ROM 1 / PD ROM Volume I - Macintosh Software from BMUG (1988).iso / Programming / Complete Applications / Telecom / MT Special 3 / KERMIT F / KERMIT XII < prev    next >
Encoding:
Text File  |  1988-01-01  |  3.0 KB  |  28 lines  |  [TEXT/ttxt]
  1. †KERMENUMDESKMFILEMTRANSMOPTIONTSENDTRECEIVETGETTFINISHTBYE"OBINTRAN#OTRANLOGKERPARAM    ABOUTKER(OFILWARN*OHANDSHA)OPADDING+OPARCHAN&OPARSAVEKPSPCKLKPRPCKLKPSTIMO    KPRTIMO
  2. KPSEOLKPREOLKPSPADCKPSPCKSTKPRPCKSTKPRTURNKPSQUOTEKPRQUOTEKPEXITOKKPABORTKERDISPLKDSENDKDRECEIVKDFILNAMKDCNVFIL
  3. KDFCNTKDBCNTKDPNUM
  4. KDBPSKDNAKCNTKDTIMCNTFDELETEFRENAMEFQUIT KPMAXTRYKRABORTKRABOKKRABMESS%ODEBUGSKPPADLSKRINIERRKRABOUTKRABOUOKKRFILEXKRFILNEX,OPARGETKRDABORTFTYPETPUTKERNYIKRMDOTYPKRMDODELKRMDORENKRMDORE2    KRMESSS    MSMORE    MSEOFKRDELDONKRRENDON
  5. KRODOSAV KRODOGETKRDELERRKRRENERR KRTDOSND
  6. KRTDORECKRTDOPUTKRTDOGETKRTRAERRKRODODEBKRODOTF    KRDBCLSD
  7. KRTFCLSD KERRFOPN KRSAVDONKRGETDONKRDEBDONKRTFDONKDPCNT    MSGSNDBG    MSGFILNX    MSGSNDRD    MSGSNDFD    MSGERRPK    MSGTLNPS        MSGDATPS    MSGTLNPR    MSGDATPR    
  8. MSGCHKER     MSGUSRAB     MSGTIMOU    
  9. MSGDSTAT    MSGTRAER    MSGSTATE    MSGFOPN    MSGERRFO    MSGSFASF    MSGTREOF    MSGFNEXT    MSGNEWFI
  10. KRCONFAB KDSENDSKDRECEISKRAVMMSKRAVDAT    MSGWOPER    MSGERSNA    MSGPROER    MSGRECRD    MSGFATFE    MSGFRASFKRPROERRKRWOPERRKRFATFER    !MSGRECBG    "MSGRECFDFDFREEKRDFREEKRDFIDKRDFBYKRDFOK    MEGHNDFA"KRDRDYOK!KRDRFCTI    MSGCHSND     MSGCHFLU    #MSGCHRD    $MSGCHPAD    %MSGCHWHC    &MSGHNDOK-OTIMOUTKRTASKGKRTGFILNKRTASKOKKRTASKAB#KDFINISH$KDBYE    'MSGGETBG    (MSGGETRD    *MSGGETFD    )MSGSRVFI    /MSGFINRD    -MSGFINFD    .MSGSRVBY    0MSGBYERD    1MSGBYEFDKSVFERRKSVBERR] kermit.68k=
  11. gemstart,
  12. astker,
  13. astgem,
  14. astgmo,
  15. astgmt,
  16. astsen,
  17. astrec,
  18. astget,
  19. astgcm,
  20. astfio,
  21. astutl,
  22. vdibind,aesbind,osbind,gemlib,libf
  23.   redisp_fld(KRDRFCTI,NIL,NIL);
  24.          evnt_timer(200,0);
  25.          change_state(displo,KRDRFCTI,NORMAL);
  26.          redisp_fld(KRDRFCTI,NIL,NIL);
  27.          return('T');
  28.         }
  29.       else
  30.         Cconout(0x07);
  31.  return(FALSE);
  32. }
  33.